home *** CD-ROM | disk | FTP | other *** search
- VERSION 2.00
- Begin Form Form1
- Caption = "Refer to Form Load coding for ""how to"" instructions."
- ClientHeight = 4020
- ClientLeft = 1080
- ClientTop = 1485
- ClientWidth = 7365
- Height = 4425
- Left = 1020
- LinkTopic = "Form1"
- ScaleHeight = 4020
- ScaleWidth = 7365
- Top = 1140
- Width = 7485
- Begin Label Label2
- Alignment = 2 'Center
- BackColor = &H00FFFFFF&
- BackStyle = 0 'Transparent
- Caption = "JWPC 1995, inc."
- FontBold = -1 'True
- FontItalic = 0 'False
- FontName = "Times New Roman"
- FontSize = 54
- FontStrikethru = 0 'False
- FontUnderline = 0 'False
- ForeColor = &H00FFFFFF&
- Height = 2325
- Left = 240
- TabIndex = 1
- Top = 1170
- Width = 7095
- End
- Begin Label Label1
- BackStyle = 0 'Transparent
- Caption = "Resize me, too!"
- ForeColor = &H00FFFFFF&
- Height = 465
- Left = 120
- TabIndex = 0
- Top = 120
- Width = 2295
- End
- Sub Form_Load ()
- ' Copyright (c) 1994 Jwpc 1995, inc.
- ' Adress:
- ' JwpcEMail @ aol.com
- ' --or--
- ' JwpcNow @ aol.com
- ' JwpcEMail is only for EMail
- ' Copy as you please!
- ' How to:
- Rem Cannot copy this file as you please, just FADE.BAS
- ' Goto FILE and then ADD FILE, and select the FADE.BAS file.
- ' Then, to display it, go to the Form_Paint sub area.
- ' Type:
- ' FadeForm Me
- ' Then, it will appear.
- 'The FADE.BAS code has examples of how to change it.
- ' please refer there next...
- End Sub
- Sub Form_Paint ()
- fadeform Me
- End Sub
- Sub Form_Resize ()
- fadeform Me
- End Sub
-